(woman2-TH): Undo last change. Use string-equal instead of

string-match.

diff --git a/lisp/woman.el b/lisp/woman.el
index 01e4f22365622ef4ae7f83070216027ebb7b2f45..eca447d07bb779ae3fd62f2398287f0232595a9d 100644 (file)
--- a/lisp/woman.el
+++ b/lisp/woman.el
@@ -3810,8 +3810,7 @@ v alters page foot left; m alters page head center.
       (insert " -- ")
       (woman-forward-arg 'unquote 'concat)
       ;; Delete repeated arguments:
-      (if (string-match (regexp-quote
-                        (buffer-substring here (point)))
+      (if (string-equal (buffer-substring here (point))
                        (buffer-substring start here))
          (delete-region here (point)))))
   ;; Embolden heading (point is at end of heading):